home *** CD-ROM | disk | FTP | other *** search
/ Practical Internet 2002 February / Practical Internet February 2002.iso / pc / Software / SiteBuilding / HomeSite_Installer.exe / data1.cab / Extensions / Includes / tdFontfaceInit.wizml < prev    next >
Encoding:
Text File  |  2001-10-11  |  2.4 KB  |  55 lines
  1. <WIZIF 0><!-- Copyright  (c) 1997-2001 Macromedia, Inc. All Rights Reserved. Consult Software License Agreement for more details.  Version 1.0 - 2001-05-31--></WIZIF>
  2. <WIZIF checkSingleQuotes EQ 'true'>
  3.     <WIZSET oQ = "'">
  4.     <WIZSET iQ = '"'>
  5. <WIZELSE>
  6.     <WIZSET oQ = '"'>
  7.     <WIZSET iQ = "'">
  8. </WIZIF>
  9. <WIZSET varFind = oQ>
  10. <WIZSET varReplace = iQ>
  11. <WIZSET varList = listFontFace>
  12. <WIZSET varSep  = ','>
  13.  
  14. <WIZIF fontFace1 NEQ ''>
  15.     <WIZIF 0><!-- replace any 'outer quotes' that are already part of the list --></WIZIF>
  16.     <WIZSET varString = fontFace1>
  17.     <WIZINCLUDE TEMPLATE="wmReplaceAll.wizml">
  18.     <WIZSET fontFace1 = varString>
  19.     <WIZIF 0><!-- add quotes to first entry if it contains space but does not already contain quotes AND other element was selected --></WIZIF>
  20.     <WIZIF Find(fontFace1,' ') AND NOT Find(fontFace1, iQ) AND (fontFace2 NEQ '' OR fontFace3 NEQ '' OR dropFaceCombo NEQ '' OR dropFaceGeneric NEQ '')>
  21.         <WIZSET fontFace1 = iQ & fontFace1 & iQ>
  22.     </WIZIF>
  23.     <WIZIF 0><!-- list initialized to first font entry --></WIZIF>
  24.     <WIZSET varList = fontFace1>
  25. </WIZIF>
  26. <WIZIF fontFace2 NEQ ''>
  27.     <WIZIF 0><!-- add quotes to second entry if it contains space AND other element was selected --></WIZIF>
  28.     <WIZIF Find(fontFace2,' ') AND (fontFace1 NEQ '' OR fontFace3 NEQ '' OR dropFaceCombo NEQ '' OR dropFaceGeneric NEQ '')>
  29.         <WIZSET fontFace2 = iQ & fontFace2 & iQ>
  30.     </WIZIF>
  31.     <WIZSET varAdd = fontFace2>
  32.     <WIZINCLUDE TEMPLATE="wmAddToList.wizml">
  33. </WIZIF>
  34. <WIZIF fontFace3 NEQ ''>
  35.     <WIZIF 0><!-- add quotes to third entry if it contains space AND other element was selected --></WIZIF>
  36.     <WIZIF Find(fontFace3,' ') AND (fontFace1 NEQ '' OR fontFace2 NEQ '' OR dropFaceCombo NEQ '' OR dropFaceGeneric NEQ '')>
  37.         <WIZSET fontFace3 = iQ & fontFace3 & iQ>
  38.     </WIZIF>
  39.     <WIZSET varAdd = fontFace3>
  40.     <WIZINCLUDE TEMPLATE="wmAddToList.wizml">
  41. </WIZIF>
  42. <WIZIF dropFaceCombo NEQ ''>
  43.     <WIZIF 0><!-- add combo font family list if selected --></WIZIF>
  44.     <WIZIF 0><!-- replace any 'outer quotes' that are already part of the list --></WIZIF>
  45.     <WIZSET varString = dropFaceCombo>
  46.     <WIZINCLUDE TEMPLATE="wmReplaceAll.wizml">
  47.     <WIZSET varAdd = varString>
  48.     <WIZINCLUDE TEMPLATE="wmAddToList.wizml">
  49. </WIZIF>
  50. <WIZIF dropFaceGeneric NEQ ''>
  51.     <WIZIF 0><!-- add generic font family if selected --></WIZIF>
  52.     <WIZSET varAdd = dropFaceGeneric>
  53.     <WIZINCLUDE TEMPLATE="wmAddToList.wizml">
  54. </WIZIF>
  55.